/ BBS in a Box 12 / BBS in a box XII-2.iso / Files II / Prog / M / MacRecorder® HackersToolkit.sit / DialogUtils.c

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 44 69 61 6c 6f 67 | 55 74 69 6c 73 2e 63 00 |..Dialog|Utils.c.|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 07 80 00 | 00 01 76 a1 a4 4a c1 a1 |........|..v..J..|
|00000060| a4 4a c1 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.J......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 96 57 00 00 |........|.....W..|
|00000080| 2f 2a 0d 20 20 09 47 65 | 6e 65 72 61 6c 20 66 75 |/*.  .Ge|neral fu|
|00000090| 6e 63 74 69 6f 6e 73 20 | 66 6f 72 20 6d 61 6e 69 |nctions |for mani|
|000000a0| 70 75 6c 61 74 69 6e 67 | 20 44 69 61 6c 6f 67 73 |pulating| Dialogs|
|000000b0| 0d 20 20 20 20 20 20 20 | 20 43 6f 70 79 72 69 67 |.       | Copyrig|
|000000c0| 68 74 20 a9 20 31 39 38 | 39 20 20 46 61 72 61 6c |ht . 198|9  Faral|
|000000d0| 6c 6f 6e 20 43 6f 6d 70 | 75 74 69 6e 67 2c 20 49 |lon Comp|uting, I|
|000000e0| 6e 63 0d 2a 2f 0d 0d 76 | 6f 69 64 09 53 65 74 52 |nc.*/..v|oid.SetR|
|000000f0| 61 64 69 6f 42 75 74 74 | 6f 6e 28 20 44 69 61 6c |adioButt|on( Dial|
|00000100| 6f 67 50 74 72 2c 20 73 | 68 6f 72 74 29 3b 0d 76 |ogPtr, s|hort);.v|
|00000110| 6f 69 64 09 54 6f 67 67 | 6c 65 52 61 64 69 6f 42 |oid.Togg|leRadioB|
|00000120| 75 74 74 6f 6e 73 28 20 | 44 69 61 6c 6f 67 50 74 |uttons( |DialogPt|
|00000130| 72 2c 20 73 68 6f 72 74 | 2c 20 73 68 6f 72 74 29 |r, short|, short)|
|00000140| 3b 0d 76 6f 69 64 09 4f | 75 74 6c 69 6e 65 44 65 |;.void.O|utlineDe|
|00000150| 66 61 75 6c 74 42 75 74 | 74 6f 6e 28 20 44 69 61 |faultBut|ton( Dia|
|00000160| 6c 6f 67 50 74 72 29 3b | 0d 76 6f 69 64 09 48 69 |logPtr);|.void.Hi|
|00000170| 6c 69 74 65 44 69 61 6c | 6f 67 49 74 65 6d 28 20 |liteDial|ogItem( |
|00000180| 44 69 61 6c 6f 67 50 74 | 72 2c 20 73 68 6f 72 74 |DialogPt|r, short|
|00000190| 29 3b 0d 76 6f 69 64 09 | 55 6e 48 69 6c 69 74 65 |);.void.|UnHilite|
|000001a0| 44 69 61 6c 6f 67 49 74 | 65 6d 28 20 44 69 61 6c |DialogIt|em( Dial|
|000001b0| 6f 67 50 74 72 2c 20 73 | 68 6f 72 74 29 3b 0d 0d |ogPtr, s|hort);..|
|000001c0| 2f 2a 0d 2a 2a 09 4f 75 | 74 6c 69 6e 65 20 64 69 |/*.**.Ou|tline di|
|000001d0| 61 6c 6f 67 27 73 20 64 | 65 66 61 75 6c 74 20 62 |alog's d|efault b|
|000001e0| 75 74 74 6f 6e 20 61 73 | 20 70 65 72 0d 2a 2a 09 |utton as| per.**.|
|000001f0| 49 6e 73 69 64 65 20 4d | 61 63 20 56 6f 6c 2e 49 |Inside M|ac Vol.I|
|00000200| 20 70 61 67 65 20 34 31 | 33 0d 2a 2f 0d 76 6f 69 | page 41|3.*/.voi|
|00000210| 64 09 4f 75 74 6c 69 6e | 65 44 65 66 61 75 6c 74 |d.Outlin|eDefault|
|00000220| 42 75 74 74 6f 6e 28 09 | 74 68 65 44 69 61 6c 6f |Button(.|theDialo|
|00000230| 67 29 0d 09 44 69 61 6c | 6f 67 50 74 72 09 09 74 |g)..Dial|ogPtr..t|
|00000240| 68 65 44 69 61 6c 6f 67 | 3b 0d 7b 0d 09 47 72 61 |heDialog|;.{..Gra|
|00000250| 66 50 74 72 09 09 73 61 | 76 65 50 6f 72 74 3b 0d |fPtr..sa|vePort;.|
|00000260| 09 52 65 63 74 09 09 62 | 6f 78 3b 0d 09 73 68 6f |.Rect..b|ox;..sho|
|00000270| 72 74 09 09 69 74 65 6d | 54 79 70 65 3b 0d 09 48 |rt..item|Type;..H|
|00000280| 61 6e 64 6c 65 09 09 69 | 74 65 6d 3b 0d 09 0d 09 |andle..i|tem;....|
|00000290| 47 65 74 50 6f 72 74 28 | 20 26 73 61 76 65 50 6f |GetPort(| &savePo|
|000002a0| 72 74 29 3b 0d 09 53 65 | 74 50 6f 72 74 28 20 74 |rt);..Se|tPort( t|
|000002b0| 68 65 44 69 61 6c 6f 67 | 29 3b 0d 09 0d 09 47 65 |heDialog|);....Ge|
|000002c0| 74 44 49 74 65 6d 28 20 | 74 68 65 44 69 61 6c 6f |tDItem( |theDialo|
|000002d0| 67 2c 20 31 2c 20 26 69 | 74 65 6d 54 79 70 65 2c |g, 1, &i|temType,|
|000002e0| 20 26 69 74 65 6d 2c 20 | 26 62 6f 78 29 3b 0d 09 | &item, |&box);..|
|000002f0| 50 65 6e 53 69 7a 65 28 | 33 2c 33 29 3b 0d 09 49 |PenSize(|3,3);..I|
|00000300| 6e 73 65 74 52 65 63 74 | 28 20 26 62 6f 78 2c 20 |nsetRect|( &box, |
|00000310| 2d 34 2c 20 2d 34 29 3b | 0d 09 46 72 61 6d 65 52 |-4, -4);|..FrameR|
|00000320| 6f 75 6e 64 52 65 63 74 | 28 20 26 62 6f 78 2c 20 |oundRect|( &box, |
|00000330| 31 36 2c 20 31 36 29 3b | 0d 09 0d 09 53 65 74 50 |16, 16);|....SetP|
|00000340| 6f 72 74 28 20 73 61 76 | 65 50 6f 72 74 29 3b 0d |ort( sav|ePort);.|
|00000350| 7d 0d 0d 2f 2a 20 70 6c | 61 63 65 20 61 20 62 75 |}../* pl|ace a bu|
|00000360| 6c 6c 65 74 20 69 6e 20 | 74 68 65 20 69 6e 64 69 |llet in |the indi|
|00000370| 63 61 74 65 64 20 72 61 | 64 69 6f 20 62 75 74 74 |cated ra|dio butt|
|00000380| 6f 6e 20 2a 2f 0d 76 6f | 69 64 09 53 65 74 52 61 |on */.vo|id.SetRa|
|00000390| 64 69 6f 42 75 74 74 6f | 6e 28 20 74 68 65 44 69 |dioButto|n( theDi|
|000003a0| 61 6c 6f 67 2c 20 74 68 | 65 49 74 65 6d 29 0d 09 |alog, th|eItem)..|
|000003b0| 44 69 61 6c 6f 67 50 74 | 72 09 74 68 65 44 69 61 |DialogPt|r.theDia|
|000003c0| 6c 6f 67 3b 0d 09 73 68 | 6f 72 74 09 09 74 68 65 |log;..sh|ort..the|
|000003d0| 49 74 65 6d 3b 0d 7b 0d | 09 43 6f 6e 74 72 6f 6c |Item;.{.|.Control|
|000003e0| 48 61 6e 64 6c 65 09 63 | 6f 6e 74 72 6f 6c 3b 0d |Handle.c|ontrol;.|
|000003f0| 09 73 68 6f 72 74 09 09 | 09 69 74 65 6d 54 79 70 |.short..|.itemTyp|
|00000400| 65 3b 0d 09 52 65 63 74 | 09 09 09 62 6f 78 3b 0d |e;..Rect|...box;.|
|00000410| 09 0d 09 47 65 74 44 49 | 74 65 6d 28 09 74 68 65 |...GetDI|tem(.the|
|00000420| 44 69 61 6c 6f 67 2c 20 | 74 68 65 49 74 65 6d 2c |Dialog, |theItem,|
|00000430| 20 26 69 74 65 6d 54 79 | 70 65 2c 20 26 63 6f 6e | &itemTy|pe, &con|
|00000440| 74 72 6f 6c 2c 20 26 62 | 6f 78 29 3b 0d 09 53 65 |trol, &b|ox);..Se|
|00000450| 74 43 74 6c 56 61 6c 75 | 65 28 20 63 6f 6e 74 72 |tCtlValu|e( contr|
|00000460| 6f 6c 2c 20 31 29 3b 0d | 7d 0d 0d 2f 2a 0d 2a 2a |ol, 1);.|}../*.**|
|00000470| 09 74 61 6b 65 20 62 75 | 6c 6c 65 74 20 6f 75 74 |.take bu|llet out|
|00000480| 20 6f 66 20 6f 6c 64 49 | 74 65 6d 0d 2a 2a 09 73 | of oldI|tem.**.s|
|00000490| 74 69 63 6b 20 62 75 6c | 6c 65 74 20 69 6e 20 6e |tick bul|let in n|
|000004a0| 65 77 49 74 65 6d 0d 2a | 2f 09 0d 76 6f 69 64 09 |ewItem.*|/..void.|
|000004b0| 54 6f 67 67 6c 65 52 61 | 64 69 6f 42 75 74 74 6f |ToggleRa|dioButto|
|000004c0| 6e 73 28 20 74 68 65 44 | 69 61 6c 6f 67 2c 20 6f |ns( theD|ialog, o|
|000004d0| 6c 64 49 74 65 6d 2c 20 | 6e 65 77 49 74 65 6d 29 |ldItem, |newItem)|
|000004e0| 0d 09 44 69 61 6c 6f 67 | 50 74 72 09 74 68 65 44 |..Dialog|Ptr.theD|
|000004f0| 69 61 6c 6f 67 3b 0d 09 | 73 68 6f 72 74 09 09 6f |ialog;..|short..o|
|00000500| 6c 64 49 74 65 6d 3b 0d | 09 73 68 6f 72 74 09 09 |ldItem;.|.short..|
|00000510| 6e 65 77 49 74 65 6d 3b | 0d 7b 0d 09 43 6f 6e 74 |newItem;|.{..Cont|
|00000520| 72 6f 6c 48 61 6e 64 6c | 65 09 63 6f 6e 74 72 6f |rolHandl|e.contro|
|00000530| 6c 3b 0d 09 73 68 6f 72 | 74 09 09 09 69 74 65 6d |l;..shor|t...item|
|00000540| 54 79 70 65 3b 0d 09 52 | 65 63 74 09 09 09 62 6f |Type;..R|ect...bo|
|00000550| 78 3b 0d 09 0d 09 47 65 | 74 44 49 74 65 6d 28 09 |x;....Ge|tDItem(.|
|00000560| 74 68 65 44 69 61 6c 6f | 67 2c 20 6f 6c 64 49 74 |theDialo|g, oldIt|
|00000570| 65 6d 2c 20 20 26 69 74 | 65 6d 54 79 70 65 2c 20 |em,  &it|emType, |
|00000580| 26 63 6f 6e 74 72 6f 6c | 2c 20 26 62 6f 78 29 3b |&control|, &box);|
|00000590| 0d 09 53 65 74 43 74 6c | 56 61 6c 75 65 28 20 63 |..SetCtl|Value( c|
|000005a0| 6f 6e 74 72 6f 6c 2c 20 | 30 29 3b 0d 09 47 65 74 |ontrol, |0);..Get|
|000005b0| 44 49 74 65 6d 28 09 74 | 68 65 44 69 61 6c 6f 67 |DItem(.t|heDialog|
|000005c0| 2c 20 6e 65 77 49 74 65 | 6d 2c 20 26 69 74 65 6d |, newIte|m, &item|
|000005d0| 54 79 70 65 2c 20 26 63 | 6f 6e 74 72 6f 6c 2c 20 |Type, &c|ontrol, |
|000005e0| 26 62 6f 78 29 3b 0d 09 | 53 65 74 43 74 6c 56 61 |&box);..|SetCtlVa|
|000005f0| 6c 75 65 28 20 63 6f 6e | 74 72 6f 6c 2c 20 31 29 |lue( con|trol, 1)|
|00000600| 3b 0d 7d 0d 0d 76 6f 69 | 64 09 48 69 6c 69 74 65 |;.}..voi|d.Hilite|
|00000610| 44 69 61 6c 6f 67 49 74 | 65 6d 28 20 74 68 65 44 |DialogIt|em( theD|
|00000620| 69 61 6c 6f 67 2c 20 69 | 74 65 6d 4e 6f 29 0d 09 |ialog, i|temNo)..|
|00000630| 44 69 61 6c 6f 67 50 74 | 72 09 74 68 65 44 69 61 |DialogPt|r.theDia|
|00000640| 6c 6f 67 3b 0d 09 73 68 | 6f 72 74 09 09 69 74 65 |log;..sh|ort..ite|
|00000650| 6d 4e 6f 3b 0d 7b 0d 09 | 43 6f 6e 74 72 6f 6c 48 |mNo;.{..|ControlH|
|00000660| 61 6e 64 6c 65 09 63 6f | 6e 74 72 6f 6c 3b 0d 09 |andle.co|ntrol;..|
|00000670| 73 68 6f 72 74 09 09 09 | 69 74 65 6d 54 79 70 65 |short...|itemType|
|00000680| 3b 0d 09 52 65 63 74 09 | 09 09 62 6f 78 3b 0d 0d |;..Rect.|..box;..|
|00000690| 09 47 65 74 44 49 74 65 | 6d 28 09 74 68 65 44 69 |.GetDIte|m(.theDi|
|000006a0| 61 6c 6f 67 2c 20 69 74 | 65 6d 4e 6f 2c 20 20 26 |alog, it|emNo,  &|
|000006b0| 69 74 65 6d 54 79 70 65 | 2c 20 26 63 6f 6e 74 72 |itemType|, &contr|
|000006c0| 6f 6c 2c 20 26 62 6f 78 | 29 3b 0d 09 48 69 6c 69 |ol, &box|);..Hili|
|000006d0| 74 65 43 6f 6e 74 72 6f | 6c 28 20 63 6f 6e 74 72 |teContro|l( contr|
|000006e0| 6f 6c 2c 20 30 29 3b 20 | 09 2f 2a 20 48 69 6c 69 |ol, 0); |./* Hili|
|000006f0| 74 65 20 49 74 65 6d 20 | 2a 2f 20 0d 7d 0d 0d 76 |te Item |*/ .}..v|
|00000700| 6f 69 64 09 55 6e 48 69 | 6c 69 74 65 44 69 61 6c |oid.UnHi|liteDial|
|00000710| 6f 67 49 74 65 6d 28 20 | 74 68 65 44 69 61 6c 6f |ogItem( |theDialo|
|00000720| 67 2c 20 69 74 65 6d 4e | 6f 29 0d 09 44 69 61 6c |g, itemN|o)..Dial|
|00000730| 6f 67 50 74 72 09 74 68 | 65 44 69 61 6c 6f 67 3b |ogPtr.th|eDialog;|
|00000740| 0d 09 73 68 6f 72 74 09 | 09 69 74 65 6d 4e 6f 3b |..short.|.itemNo;|
|00000750| 0d 7b 0d 09 43 6f 6e 74 | 72 6f 6c 48 61 6e 64 6c |.{..Cont|rolHandl|
|00000760| 65 09 63 6f 6e 74 72 6f | 6c 3b 0d 09 73 68 6f 72 |e.contro|l;..shor|
|00000770| 74 09 09 09 69 74 65 6d | 54 79 70 65 3b 0d 09 52 |t...item|Type;..R|
|00000780| 65 63 74 09 09 09 62 6f | 78 3b 0d 09 0d 09 47 65 |ect...bo|x;....Ge|
|00000790| 74 44 49 74 65 6d 28 09 | 74 68 65 44 69 61 6c 6f |tDItem(.|theDialo|
|000007a0| 67 2c 20 69 74 65 6d 4e | 6f 2c 20 20 26 69 74 65 |g, itemN|o,  &ite|
|000007b0| 6d 54 79 70 65 2c 20 26 | 63 6f 6e 74 72 6f 6c 2c |mType, &|control,|
|000007c0| 20 26 62 6f 78 29 3b 0d | 09 48 69 6c 69 74 65 43 | &box);.|.HiliteC|
|000007d0| 6f 6e 74 72 6f 6c 28 20 | 63 6f 6e 74 72 6f 6c 2c |ontrol( |control,|
|000007e0| 20 32 35 35 29 3b 20 09 | 2f 2a 20 55 6e 48 69 6c | 255); .|/* UnHil|
|000007f0| 69 74 65 20 49 74 65 6d | 20 2a 2f 20 0d 7d 0d 0d |ite Item| */ .}..|
|00000800| 00 00 01 00 00 00 01 1c | 00 00 00 1c 00 00 00 5a |........|.......Z|
|00000810| 57 3b 80 49 57 72 80 7a | 57 2e 80 e1 57 6f 80 e1 |W;.IWr.z|W...Wo..|
|00000820| 57 69 80 7a 57 65 80 e1 | 57 2c 80 e1 57 3a 80 72 |Wi.zWe..|W,..W:.r|
|00000830| 0d 44 69 61 6c 6f 67 55 | 74 69 6c 73 2e 63 02 00 |.DialogU|tils.c..|
|00000840| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000850| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 a9 80 1b 5b 00 00 | 00 00 00 00 01 76 80 e1 |.....[..|.....v..|
|00000880| d5 74 80 49 d5 20 80 97 | d5 73 80 97 d5 d5 80 e1 |.t.I. ..|.s......|
|00000890| 72 d5 00 e1 72 71 80 49 | 72 2e 80 e1 72 6f 80 49 |r...rq.I|r...ro.I|
|000008a0| 72 68 80 49 72 67 80 49 | 72 65 80 49 72 2c 80 e1 |rh.Irg.I|re.Ir,..|
|000008b0| 72 63 80 49 76 2e 80 e1 | 76 2c 80 e1 77 2e 80 e1 |rc.Iv...|v,..w...|
|000008c0| 77 2c 80 e1 79 2e 80 97 | 79 2c 80 97 00 00 04 5e |w,..y...|y,.....^|
|000008d0| 10 00 00 12 00 00 00 ff | 0a d9 83 f7 10 00 10 00 |........|........|
|000008e0| 00 00 00 54 00 00 02 b8 | 00 00 02 5c 00 00 00 00 |...T....|...\....|
|000008f0| 00 00 00 00 01 00 01 55 | 81 55 01 55 00 00 00 00 |.......U|.U.U....|
|00000900| 00 00 00 02 00 00 00 00 | 00 04 00 06 00 08 00 00 |........|........|
|00000910| 00 0a 00 09 06 4d 6f 6e | 61 63 6f 00 00 00 01 00 |.....Mon|aco.....|
|00000920| 00 00 01 1c 00 00 00 1c | 00 00 00 5a 00 35 eb 10 |........|...Z.5..|
|00000930| 0d 3a 00 00 00 1c 00 5a | 00 02 45 51 45 44 00 00 |.:.....Z|..EQED..|
|00000940| 00 1a 45 54 41 42 00 00 | 00 26 45 46 4e 54 00 00 |..ETAB..|.&EFNT..|
|00000950| 00 32 03 eb ff ff 00 00 | 00 00 00 00 00 00 03 ec |.2......|........|
|00000960| ff ff 00 00 00 06 00 35 | e9 e8 03 eb ff ff 00 00 |.......5|........|
|00000970| 00 0e 00 35 e9 d8 00 00 | 00 00 00 00 00 00 00 00 |...5....|........|
+--------+-------------------------+-------------------------+--------+--------+